home *** CD-ROM | disk | FTP | other *** search
/ Ian & Stuart's Australian Mac: Not for Sale / Another.not.for.sale (Australia).iso / fade into you / getting there / WWW / MacHTTP Extras / Script Tools / Examples / Choose File In Prefs Folder < prev    next >
Encoding:
Text File  |  1993-08-02  |  372 b   |  20 lines  |  [TEXT/R*ch]
  1. --
  2. --    Record the current folder so we can restore it once were done
  3. --
  4. set saveFolder to get default folder
  5.  
  6. --
  7. --    Let the user select a file
  8. --
  9. set default folder (path to preferences)
  10. set result to choose file with prompt "Select Preferences File:"
  11.  
  12. --
  13. --    Restore the original default folder
  14. --
  15. set default folder saveFolder
  16.  
  17. --
  18. --    Lets see what was selected
  19. --
  20. {result}